home *** CD-ROM | disk | FTP | other *** search
/ Nautilus 1994 June / Nautilus CD Magazine Volume 4-6 June 1994 Windows Edition.mdf / compware / highfive / unicom / ellipse.sc_ / ellipse.sc
Text File  |  1993-04-22  |  107b  |  7 lines
  1. i=0
  2. GdiCreateBrush(0,255,0)
  3. while (i<320)
  4.   gdiellipse(i,200-i/3,640-i,200+i/3)
  5.   i = i+ 10
  6. endwhile
  7.